UC知道VB"424"提示问题问题
来源：百度知道 编辑：UC知道 时间：2024/06/06 02:27:44
Dim rs As New ADODB.Recordset
Dim conn As New ADODB.Connection
conn.ConnectionString = "provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=false;Initial Catalog=用户数据库;Data Sourrce=(local)"
conn.Open
rs.Open "select * from 员工信息表", conn, adOpenDynamic, adLockBatchOptimistic
Text1.Text = Trim(rs.Fields("姓名"))
Text2.Text = Trim(rs.Fields("工作编号"))
Text3.Text = Trim(rs.Fields("性别"))
Text4.Text = Trim(rs.Fields("所在部门"))
Text5.Text = Trim(rs.Fields("职位"))
Text6.Text = Trim(rs.Fields("健康状况"))
Text7.Text = Trim(rs.Fields("工资"))
End Sub
Private Sub Command4_Click()
rs.MoveNext
End Sub
点击command4 弹出424 "要求对象"的提示,请问这是什么问题?
你在Form_Load()过程中定义了rs和conn，这是过程级对象，在Form_Load()过程结束后，对象就失效了。
一般做法是添加一个模块，在模块中定义，然后在工程的任何地方都可以调用rs和conn。
另外，在一个过程中链接数据库和加载数据集，必须在这个过程中关闭：
rs.close
conn.close
在其他过程重新加载
Set conn = CurrentProject.Connection
需要对象（错误 424）
引用属性和方法经常需要一个明确的对象限定符。此错误有以下的原因和解决方法：
当引用对象属性或方法时，没有提供正确的对象限定符。
如果没有提供的话，指定一个对象限定符。例如，从窗体的模块中引用窗体属性时，虽然可以省略对象的限定符，但是当从标准模块中引用一个属性时，则必须指定限定符。
提供一个对象限定符，但不能识别出对象。
检查对象限定符的拼写，并确保在所引用的程序中此对象是可见的。在 Collection 对象中，请检查每个 Add 方法的使用，以确保语法应正确，以及所有部件的拼写应正确。
提供了正确的对象限定符，但调用的其他部分有错误。
将非法路径当作主机应用程序中“文件打开”命令的参数会引起错误。请检查参数。
在指定对象的引用时，没有使用 Set 语句。
如果指定 CreateObject 调用的返回值为 Variant 变量，那么如果省略 Set 语句的话，此错误就可能会发生。在以下的代码示例中，创建一 个 Microsoft Excel 隐含实例，且返回 Variant RetVal 的缺省属性 ("Microsoft Excel" 字符串）并赋给 Variant RetVal，然后将 RetVal 当作对象引用时，发生了此错误：
Dim RetVal ' 为一个 Variant。
' 缺省属性赋值为类型 8，即 Variant RetVal。
RetVal =